home *** CD-ROM | disk | FTP | other *** search
/ Aminet 2 / Aminet AMIGA CDROM (1994)(Walnut Creek)[Feb 1994][W.O. 44790-1].iso / Aminet / comm / bbs / VBBSDisk5_0.lzh / VBBS.script < prev    next >
Text File  |  1991-09-15  |  1KB  |  60 lines
  1. ;VBBS.scp - script for dialing both of VBBS's lines automatically
  2. ;
  3. ;Features:
  4. ;     - handles both lines
  5. ;     - properly steps between lines
  6. ;     - waits a minute if both lines are busy, before tryinng again
  7. ;     - adjusts modems "NO CONNECT" timeout to more optimum values
  8. ;         (this may need individual attention)
  9. ;     - more reliable design
  10. ;     - allows human assistance (you can hit <return> if you hear a busy
  11. ;         signal, and your modem doesn't detect it)
  12. ;
  13. ;  This script works very nicely on USR modems.
  14. ;
  15. ;/kenw 910210
  16.  
  17. init
  18.  
  19.   delay 15      ; make sure modem is clear
  20.   send +++
  21.   delay 20
  22.   send atz
  23.   cr
  24.   wait OK
  25.   send ats7=25      ; set fairly short "connect patience"
  26.   cr
  27.   wait OK
  28.  
  29.   on CONNECT startproto  ;when we get a CONNECT we go to the startproto label
  30.  
  31. line1
  32.   cr
  33.   on "NO CARRIER" line2
  34.   on BUSY line2
  35.   send atdt284-2048
  36.   cr
  37.   delay 500
  38.   cr
  39.   wait OK
  40.  
  41. line2
  42.   cr
  43.   on "NO CARRIER" line1
  44.   on BUSY waitaminute
  45.   send atdt284-5624
  46.   cr
  47.   delay 500
  48.   cr
  49.   wait OK
  50.  
  51. waitaminute
  52.   print "Can't get through - waiting a minute before trying again..."
  53.   delay 600
  54.   goto line1
  55.  
  56. startproto
  57.   wait 5
  58.   print "We have connection, starting protocol"
  59.   exit
  60.